home *** CD-ROM | disk | FTP | other *** search
/ Clickx 4 / Clickx 4.iso / Data / ce2kmain.exe / %MAINDIR% / Tutorial / Tutorial.exe / Tutorial.dcr / 00001.ls next >
Encoding:
Text File  |  2002-01-01  |  498 b   |  18 lines
  1. on exitFrame
  2.   baRegister("Robert Ellison", 3240391)
  3.   fileExist = 0
  4.   comLine = baCommandArgs()
  5.   fileExist = baFileExists(the pathname & comLine & ".*")
  6.   if fileExist = 1 then
  7.     if comLine <> EMPTY then
  8.       go(1, comLine)
  9.     end if
  10.   else
  11.     message = "Movie " & comLine & " could not be found!"
  12.     alert(message)
  13.   end if
  14.   if (comLine = EMPTY) or (comLine = VOID) then
  15.     alert("This program is called from within Cool Edit 2000, and is not intended to be run directly.")
  16.   end if
  17. end
  18.